English -فارسي

Friday July 08, 2005 08:35:11 ق.ظ

 

 

 

 

 

صفحه اول

 

logo

LOGO زباني است كهننه و قديمي براي ترسيم نگاره ها و عملياتهاي رياضي و خواندن ونوشتن داده ها كه در هندسه كاربرد بيشتري دارد وظيفه رسم در آن بر عهده لاكپشت مشهور است و امكانات جالب اين برنامه توليد قطعات موسيقي دلخواه وزيبا است. اساس كار اين برنامه دستورات برنامه نويسي است فراميني كه بسيار آشنا وبا معنا هستنددر زير ليستي از اين فرامين آمده است كه در ساخت برنامه ها به اين زبان بايد به كار رود

1- پاكيزه كردن   نگاره ها را پاك ولي لاكپشت در جاي خود مي ماند

CLEAN

2- پاك كردن متن

CLERTEXT     -    CT

3- تعيين رنگ قلم

شماره رنگ SETPC

رنگ

شماره

رنگ

شماره

رنگ

شماره

سياه

0

قهوه اي

6

قرمز روشن

12

آبي

1

سفيد

7

ارغواني روشن

13

سبز

2

خاكستري

8

زرد

14

فيروزه اي

3

آبي روشن

9

سفيد روشن

15

قرمز

4

سبز روشن

10

جدول رنگها به همراه شماره رنگ در لوگو

ارغواني

5

فيروزه اي روشن

11

 

4- تعيين رنگ زمينه

شماره رنگSETBG

5-  تعيين رنگ متن

شماره رنگTEXTBG

6- رنگ نوشته ها

شماره رنگTEXTFG

فرامين رسم

 

1-    كشيدن خط به سمت جلو

میزان حرکت لاكپشتFORWARD   or  FD

2-    چرخش

چرخش به راست به درجهRT

3-    برگشت

ميزان بازگشت BK

يك مثال

 مخفی شدن لاكپشت تا در جريان رسم مشخص نباشد HT

صد واحد به سمت جلو حركت كن  FD 100

50 واحد به عقب بازگرد  BK 50

حركت عمودي به محل مختصاتي X=130  در صفحه    SETX 130

SETY 3

رفتن به مختصات(X=65 Y=120) در صفحه    SETXY[65 120]

بازگشت به محل شروع حركت لاكپشت HOME 

پايان برنامه    END

اين برنامه شكلي را پديد مي آورد كه تنها جنبه آموزشي دارد اما گر دوست داريد برنامه هاي جالب بنويسيد به قسمت پايين مراجعه كنيد در لوگو فرامين كنترلي وغيره هم وجود دارد كه تقريبا مثل برنامه هاي ديگر است برنامه هاي زير را با دقت مطالعه برسي كنيد و حدس بزنيد هر فرمان جه عملي انجام مي دهد   

مثال جالب اول)تعداد شاخ و برگ را از ورودي مي گيرد و درختي زيبا را رسم مي كند

TO P6.45 :N:M

CS

TREE :N:M

END

TO TREE :N:M

IF :N<1 STOP

FOR WARD :N

LEFT 45

TREE N/:M:M

RIGHT 90

TREE :N/:M:M

LEFT 45

BACK :N

END

مثال جالب دوم ) عددي را از كاربر كرفته و با وجود آن دايرههاي متحد المركزي را به نحو زيبايي رسم مي كند

TO P3.31

REPEAT 36 [FD 10 RT 10]

END

TO P3.33

CS

REPEAT[P3.31 RT 360/:N]

END

 

 

 

شمارنده
Copyright © 2005 ifjam inc.All right reserved
Email to: ifjam@hotmail.com